home *** CD-ROM | disk | FTP | other *** search
/ HyperLib 1997 Winter - Disc 1 / HYPERLIB-1997-Winter-CD1.ISO.7z / HYPERLIB-1997-Winter-CD1.ISO / オンラインウェア / GAME / RoboWar 4.1.1.sit / RoboWar 4.1.1 / Tournament VII / Team / Team - Cloak Folk next >
Text File  |  1994-01-14  |  8KB  |  471 lines
  1. #Team - Cloak Folk's Revenge 
  2. #by Paul Schmidt
  3. #modified on January 14, 1994
  4. #e-mail:  schmidtp@carleton.edu
  5. #snail mail:Paul Schmidt
  6. #           Carleton College
  7. #           Northfield, MN 55057
  8.  
  9. {Cloak Folk's Revenge is simple and deadly.  He has been evolving for a long time, and growing in power.  Fear him, especially in individual competition.  Please don't duplicate whole sections of code.  However, feel free to take ideas and redo them.
  10. His name has been shortened so that it is easier to read in the tournament results.}
  11.  
  12. DuoStart:
  13.  0 speedx' store
  14.  0 speedy' store
  15.  unload range' setint
  16.  inton
  17.  0 aim' store
  18.  6 aim' store
  19.  12 aim' store
  20.  18 aim' store
  21.  24 aim' store
  22.  30 aim' store
  23.  36 aim' store
  24.  42 aim' store
  25.  48 aim' store
  26.  54 aim' store
  27.  60 aim' store
  28.  66 aim' store
  29.  72 aim' store
  30.  78 aim' store
  31.  84 aim' store
  32.  90 aim' store
  33.  96 aim' store
  34.  102 aim' store
  35.  108 aim' store
  36.  114 aim' store
  37.  120 aim' store
  38.  126 aim' store
  39.  132 aim' store
  40.  138 aim' store
  41.  144 aim' store
  42.  150 aim' store
  43.  156 aim' store
  44.  162 aim' store
  45.  168 aim' store
  46.  174 aim' store
  47.  180 aim' store
  48.  186 aim' store
  49.  192 aim' store
  50.  198 aim' store
  51.  204 aim' store
  52.  210 aim' store
  53.  216 aim' store
  54.  222 aim' store
  55.  228 aim' store
  56.  234 aim' store
  57.  240 aim' store
  58.  246 aim' store
  59.  254 aim' store
  60.  260 aim' store
  61.  266 aim' store
  62.  272 aim' store
  63.  278 aim' store
  64.  284 aim' store
  65.  290 aim' store
  66.  296 aim' store
  67.  302 aim' store
  68.  308 aim' store
  69.  314 aim' store
  70.  320 aim' store
  71.  326 aim' store
  72.  332 aim' store
  73.  338 aim' store
  74.  344 aim' store
  75.  350 aim' store
  76.  355 aim' store
  77.  intoff
  78. GetGoing:
  79.  x 230 > Run5 Run6 ife
  80.  y 230 > Run7 Run8 ifeg 
  81.  
  82. Run5:
  83.  x 4 mod chs 2 - speedx' store
  84. return
  85.  
  86. Run6:
  87.  x 4 mod 2 + speedx' store
  88. return
  89.  
  90. Run7:
  91.  y 4 mod chs 2 - speedy' store
  92. preMain jump
  93.  
  94. Run8:
  95.  y 4 mod 2 + speedy' store
  96. preMain jump
  97.  
  98. Unload:
  99.  aim doppler 9 * 2 / + aim' store
  100.  150 fire' store
  101.  dropall
  102. GetGoing jump
  103.  
  104. Stopx:
  105.  0 speedx' store
  106. return
  107.  
  108. Stopy:
  109.  0 speedy' store
  110. return
  111.  
  112. Multi:
  113.  x 230 > Run5 Run6 ife  
  114.  y 230 > Run7 Run8 ifeg 
  115.  
  116. preMain:
  117.  shoot range' setint
  118.  500 range' setparam
  119.  backUp collision' setint
  120.  Run2 left' setint
  121.  Run1 right' setint
  122.  Run3 bot' setint
  123.  Run4 top' setint
  124. main:
  125.  inton
  126.  0 aim' store
  127.  7 aim' store
  128.  14 aim' store
  129.  21 aim' store
  130.  28 aim' store
  131.  35 aim' store
  132.  42 aim' store
  133.  49 aim' store
  134.  56 aim' store
  135.  63 aim' store
  136.  70 aim' store
  137.  77 aim' store
  138.  84 aim' store
  139.  91 aim' store
  140.  98 aim' store
  141.  105 aim' store
  142.  112 aim' store
  143.  119 aim' store
  144.  126 aim' store
  145.  133 aim' store
  146.  140 aim' store
  147.  147 aim' store
  148.  154 aim' store
  149.  161 aim' store
  150.  168 aim' store
  151.  175 aim' store
  152.  182 aim' store
  153.  189 aim' store
  154.  196 aim' store
  155.  203 aim' store
  156.  210 aim' store
  157.  217 aim' store
  158.  224 aim' store
  159.  231 aim' store
  160.  238 aim' store
  161.  245 aim' store
  162.  252 aim' store
  163.  259 aim' store
  164.  266 aim' store
  165.  273 aim' store
  166.  280 aim' store
  167.  287 aim' store
  168.  294 aim' store
  169.  301 aim' store
  170.  308 aim' store
  171.  315 aim' store
  172.  322 aim' store
  173.  329 aim' store
  174.  336 aim' store
  175.  343 aim' store
  176.  350 aim' store
  177.  357 aim' store
  178.  4 aim' store
  179.  11 aim' store
  180.  18 aim' store
  181.  25 aim' store
  182.  32 aim' store
  183.  39 aim' store
  184.  46 aim' store
  185.  53 aim' store
  186.  60 aim' store
  187.  67 aim' store
  188.  74 aim' store
  189.  81 aim' store
  190.  88 aim' store
  191.  95 aim' store
  192.  102 aim' store
  193.  109 aim' store
  194.  116 aim' store
  195.  123 aim' store
  196.  130 aim' store
  197.  137 aim' store
  198.  144 aim' store
  199.  151 aim' store
  200.  158 aim' store
  201.  205 aim' store
  202.  212 aim' store
  203.  219 aim' store
  204.  226 aim' store
  205.  233 aim' store
  206.  240 aim' store
  207.  247 aim' store
  208.  254 aim' store
  209.  261 aim' store
  210.  268 aim' store
  211.  275 aim' store
  212.  282 aim' store
  213.  289 aim' store
  214.  296 aim' store
  215.  303 aim' store
  216.  310 aim' store
  217.  317 aim' store
  218.  324 aim' store
  219.  331 aim' store
  220.  338 aim' store
  221.  345 aim' store
  222.  352 aim' store
  223.  359 aim' store
  224.  6 aim' store
  225.  13 aim' store
  226.  20 aim' store
  227.  27 aim' store
  228.  34 aim' store
  229.  41 aim' store
  230.  48 aim' store
  231.  55 aim' store
  232.  62 aim' store
  233.  69 aim' store
  234.  76 aim' store
  235.  83 aim' store
  236.  90 aim' store
  237.  97 aim' store
  238.  104 aim' store
  239.  111 aim' store
  240.  118 aim' store
  241.  125 aim' store
  242.  132 aim' store
  243.  139 aim' store
  244.  146 aim' store
  245.  153 aim' store
  246.  160 aim' store
  247.  167 aim' store
  248.  174 aim' store
  249.  181 aim' store
  250.  188 aim' store
  251.  195 aim' store
  252.  202 aim' store
  253.  209 aim' store
  254.  216 aim' store
  255.  223 aim' store
  256.  230 aim' store
  257.  237 aim' store
  258.  244 aim' store
  259.  251 aim' store
  260.  258 aim' store
  261.  265 aim' store
  262.  272 aim' store
  263.  279 aim' store
  264.  286 aim' store
  265.  293 aim' store
  266.  300 aim' store
  267.  307 aim' store
  268.  314 aim' store
  269.  321 aim' store
  270.  328 aim' store
  271.  335 aim' store
  272.  342 aim' store
  273.  349 aim' store
  274.  356 aim' store
  275.  4 aim' store
  276.  11 aim' store
  277.  18 aim' store
  278.  25 aim' store
  279.  32 aim' store
  280.  39 aim' store
  281.  46 aim' store
  282.  53 aim' store
  283.  60 aim' store
  284.  67 aim' store
  285.  74 aim' store
  286.  81 aim' store
  287.  88 aim' store
  288.  95 aim' store
  289.  102 aim' store
  290.  109 aim' store
  291.  116 aim' store
  292.  123 aim' store
  293.  130 aim' store
  294.  137 aim' store
  295.  144 aim' store
  296.  151 aim' store
  297.  158 aim' store
  298.  205 aim' store
  299.  212 aim' store
  300.  219 aim' store
  301.  226 aim' store
  302.  233 aim' store
  303.  240 aim' store
  304.  247 aim' store
  305.  254 aim' store
  306.  261 aim' store
  307.  268 aim' store
  308.  275 aim' store
  309.  282 aim' store
  310.  289 aim' store
  311.  296 aim' store
  312.  303 aim' store
  313.  310 aim' store
  314.  317 aim' store
  315.  324 aim' store
  316.  331 aim' store
  317.  338 aim' store
  318.  345 aim' store
  319.  352 aim' store
  320.  359 aim' store
  321.  6 aim' store
  322.  13 aim' store
  323.  20 aim' store
  324.  27 aim' store
  325.  34 aim' store
  326.  41 aim' store
  327.  48 aim' store
  328.  55 aim' store
  329.  62 aim' store
  330.  69 aim' store
  331.  76 aim' store
  332.  83 aim' store
  333.  90 aim' store
  334.  97 aim' store
  335.  104 aim' store
  336.  111 aim' store
  337.  118 aim' store
  338.  125 aim' store
  339.  132 aim' store
  340.  139 aim' store
  341.  146 aim' store
  342.  153 aim' store
  343.  160 aim' store
  344.  167 aim' store
  345.  174 aim' store
  346.  181 aim' store
  347.  188 aim' store
  348.  195 aim' store
  349.  202 aim' store
  350.  209 aim' store
  351.  216 aim' store
  352.  223 aim' store
  353.  230 aim' store
  354.  237 aim' store
  355.  244 aim' store
  356.  251 aim' store
  357.  258 aim' store
  358.  265 aim' store
  359.  272 aim' store
  360.  279 aim' store
  361.  286 aim' store
  362.  293 aim' store
  363.  300 aim' store
  364.  307 aim' store
  365.  314 aim' store
  366.  321 aim' store
  367.  328 aim' store
  368.  335 aim' store
  369.  342 aim' store
  370.  349 aim' store
  371.  356 aim' store
  372.  4 aim' store
  373.  11 aim' store
  374.  18 aim' store
  375.  25 aim' store
  376.  32 aim' store
  377.  39 aim' store
  378.  46 aim' store
  379.  53 aim' store
  380.  60 aim' store
  381.  67 aim' store
  382.  74 aim' store
  383.  81 aim' store
  384.  88 aim' store
  385.  95 aim' store
  386.  102 aim' store
  387.  109 aim' store
  388.  116 aim' store
  389.  123 aim' store
  390.  130 aim' store
  391.  137 aim' store
  392.  144 aim' store
  393.  151 aim' store
  394.  158 aim' store
  395.  205 aim' store
  396.  212 aim' store
  397.  219 aim' store
  398.  226 aim' store
  399.  233 aim' store
  400.  240 aim' store
  401.  247 aim' store
  402.  254 aim' store
  403.  261 aim' store
  404.  268 aim' store
  405.  275 aim' store
  406.  282 aim' store
  407.  289 aim' store
  408.  296 aim' store
  409.  303 aim' store
  410.  310 aim' store
  411.  317 aim' store
  412.  324 aim' store
  413.  331 aim' store
  414.  338 aim' store
  415.  345 aim' store
  416.  352 aim' store
  417.  359 aim' store
  418. speedx not speedy not or Robots 3 < energy 140 > or or DuoStart Main ifeg
  419.  
  420. Shoot:
  421.  range dup 36 < and unload ifg
  422.  aim doppler 9 * 2 / + aim' store
  423.  energy 10 - fire' store 
  424. rti
  425.  
  426. SideShot:
  427.  aim doppler 9 * 2 / +
  428.  range dup 50 < and unload ifg
  429.  aim' store
  430.  energy 10 - fire' store
  431. return
  432.  
  433. Run1:
  434.  x 4 mod chs 2 - speedx' store
  435.  15 aim' store range sideShot if
  436.  165 aim' store range sideShot if
  437. rti
  438.  
  439. Run2:
  440.  x 4 mod 2 + speedx' store
  441.  195 aim' store range sideShot if
  442.  345 aim' store range sideShot if
  443. rti
  444.  
  445. Run3:
  446.  y 4 mod chs 2 - speedy' store
  447.  105 aim' store range sideShot if
  448.  255 aim' store range sideShot if
  449. rti
  450.  
  451. Run4:
  452.  y 4 mod 2 + speedy' store
  453.  285 aim' store range sideShot if
  454.  75 aim' store range sideShot if
  455. rti
  456.  
  457. BackUp:
  458.  unload range' setint
  459.  48 range' setparam
  460.  inton
  461.  0 aim' store
  462.  45 aim' store
  463.  90 aim' store
  464.  135 aim' store
  465.  180 aim' store
  466.  225 aim' store
  467.  270 aim' store
  468.  315 aim' store
  469.  intoff
  470.  dropall
  471. getGoing jump